home *** CD-ROM | disk | FTP | other *** search
/ Workplace Effectiveness: Dealing with Change / Workplace Effectiveness: Dealing with Change.iso / pc / Assess.Dxr / Internal_20_Exp rollover frame 1.ls < prev    next >
Encoding:
Text File  |  1998-04-24  |  858 b   |  35 lines
  1. global gMasterData, grollerList, gLastRoller, gLastMC
  2.  
  3. on exitFrame
  4.   set thisMC to the mouseCast
  5.   if thisMC <> gLastMC then
  6.     set thisName to the name of member thisMC
  7.     if thisName contains "roll" then
  8.       soundOrNext()
  9.       exit
  10.     end if
  11.     set rollTest to 0
  12.     set rollList to getProp(grollerList, #sprites)
  13.     repeat with X in rollList
  14.       if thisMC = the memberNum of sprite X then
  15.         set rollTest to 1
  16.         set hotSprite to X
  17.         set thisName to the name of member thisMC
  18.         exit repeat
  19.       end if
  20.     end repeat
  21.     if rollTest then
  22.       showRoller(hotSprite, thisName)
  23.       showBalloon(thisName)
  24.       if hotSprite <> gLastRoller then
  25.         puppetSprite(gLastRoller, 0)
  26.         set gLastRoller to hotSprite
  27.       end if
  28.     else
  29.       clearRollers()
  30.       clearBalloon()
  31.     end if
  32.   end if
  33.   soundOrNext()
  34. end
  35.